home *** CD-ROM | disk | FTP | other *** search
/ Softdisk Supreme / Softdisk Supreme.iso / pc / DSK Files / 0-49 / SD018c.dsk / PAL.55113.SCHAI.MAR.83.A.bas < prev    next >
BASIC Source File  |  2003-06-12  |  1KB  |  24 lines
  1. 10  CLEAR 
  2. 20  HOME 
  3. 25  SPEED= 150
  4. 30  PRINT "FOR ALL OF YOU ROBOTWAR FANS, HERE IS A REALLY FUN TIME!! (CHECK IT OUT!):
  5. 40  PRINT : PRINT 
  6. 50 H$ = "-=< POSTAL >=-"
  7. 60 HA$ = "ROBOTWAR TOURNAMENTS"
  8. 70 P$ = "PRIZES INCLUDE;"
  9. 80 PA$ = "OFFICIAL ROBOTWAR T-SHIRTS & 3M DISKS"
  10. 90  PRINT  TAB( 20 - LEN(H$)/2);H$
  11. 100  PRINT  TAB( 20 - LEN(HA$)/2);HA$
  12. 110  PRINT : PRINT  TAB( 20 - LEN(P$)/2);P$
  13. 120  PRINT : PRINT  TAB( 20 - LEN(PA$)/2);PA$
  14. 130  PRINT : PRINT "CONTESTANTS WILL RECEIVE A COPY OF THE  ELIMINATION CHARTS, WHICH SHOW ALL ROBOT SCORES AT EVERY STEP OF THE TOURNAMENT."
  15. 140  PRINT "CONTESTANTS WILL ALSO HAVE THE ASSEMBLEDVERSION OF THE FIVE SEMIFINALISTS TRANS-FERRED TO THEIR DISK BEFORE ITS RETURN."
  16. 150  PRINT : PRINT "FOR MAILING INSTRUCTIONS AND TOURNAMENT RULES, CONTACT:"
  17. 160  PRINT : HTAB 10: PRINT "FRANK KROGH"
  18. 170  HTAB 10: PRINT "P.O. BOX 5337"
  19. 180  HTAB 10: PRINT "NORTH HOLLYWOOD, CA.  91616"
  20. 185  PRINT : PRINT 
  21. 190 M$ = "<ANY KEY FOR PAL MENU>"
  22. 200  HTAB (20 - LEN(M$)/2): PRINT M$
  23. 210  GET KB$: PRINT KB$: HOME 
  24. 220  PRINT  CHR$(4);"RUN PAL.MENU"